-- card: 179610 from stack: in
-- bmap block id: 0
-- flags: 0000
-- background id: 4507
-- name: 
----- HyperTalk script -----
on closeCard
  set script of button "New" to empty
end closeCard


-- part 4 (button)
-- low flags: 00
-- high flags: 8003
-- rect: left=363 top=202 right=251 bottom=473
-- title width / last selected line: 0
-- icon id / first selected line: 1006 / 1006
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Sample button
----- HyperTalk script -----
on mouseUp
  put "Today is" && the long date
end mouseUp



-- part 10 (button)
-- low flags: 00
-- high flags: 8003
-- rect: left=386 top=263 right=285 bottom=444
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: New


-- part 14 (button)
-- low flags: 00
-- high flags: 8003
-- rect: left=14 top=294 right=314 bottom=151
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Restore properties
----- HyperTalk script -----
on mouseUp
  set script of button "New" to empty
  set name of button 1 to "Sample button"
  set style of button 1 to roundRect
  set rect of button 1 to 363,202,473,251
  Set icon of button 1 to 1006
  Set ShowName of button 1 to true
  Set hilite of button 1 to false
  Set autohilite of button 1 to false
end mouseUp



-- part contents for background part 2
----- text -----
Button properties

-- part contents for background part 43
----- text -----
335,253

-- part contents for background part 44
----- text -----
script
name
 number
id
style
rect
loc
icon
showName
hilite
autoHilite


-- part contents for background part 1
----- text -----
set script of button "New" to the script of button 1
set name of button "Sample button" to "My button" 
the number of button "New"--can't set
the id of button 1--can't set
set style of button 1 to rectangle--or any style
set the rect of button 1 to 163,202,473,251
set loc of button 1 to 200,200  --center h,v
Set icon of button 1 to 1007
Set ShowName of button 1 to false
Set hilite of button 1 to true
Set autoHilite of button 3 to true